home *** CD-ROM | disk | FTP | other *** search
- put what into process
- repeat with x = 1 to the number of chars in process
- get char x of process
- if it is ";" then put "," into char x of process
- end repeat
- if word 1 of process is "Added:" then delete word 1 of process
- if word 1 of process is "Deleted:" then
- beep
- do restext("TEXT", "Exit", colorauthoringpath)
- end if
- if item 2 of process is "<unnamed>" then put item 3 of process into Preview
- else
- put item 2 of process into Preview
- end if
- picture Preview , resource, windoid, true